# 存储数据
# write.table() 或 save() 函数
#
# Yuehan Yang. 2014/8/19 yyh@cufe.edu.cn

# 以数据框 d 为例
d <- data.frame(obs = c(1,2,3), treat = c("A", "B",
                                          "A"),
                weight = c(2.3, NA, 9))
#
# 保存为简单的文本文件
write.table(d, file = "F:/test.txt",
            row.names = F, quote = F)
#
# 保存为逗号分割的文本文件
write.csv(d, file = "F:/test.csv",
          row.names = F, quote = F)

#
# 保存为 R 格式文件
save(d, file = "F:/test.Rdata") # 保存工作空间的映像



